home *** CD-ROM | disk | FTP | other *** search
- object Form1: TForm1
- Left = 342
- Top = 136
- Width = 249
- Height = 217
- Caption = 'Drag race!'
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = []
- PixelsPerInch = 96
- Scaled = False
- OnCreate = FormCreate
- TextHeight = 14
- object Panel1: TPanel
- Left = 0
- Top = 33
- Width = 241
- Height = 124
- Align = alClient
- BevelOuter = bvLowered
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- object Button1: TButton
- Left = 4
- Top = 8
- Width = 75
- Height = 25
- Caption = '1'
- Enabled = False
- TabOrder = 0
- OnMouseDown = ButtonMouseDown
- OnMouseUp = ButtonMouseUp
- end
- object Button2: TButton
- Left = 84
- Top = 8
- Width = 75
- Height = 25
- Caption = '2'
- Enabled = False
- TabOrder = 1
- OnMouseDown = ButtonMouseDown
- OnMouseUp = ButtonMouseUp
- end
- object Button3: TButton
- Left = 162
- Top = 8
- Width = 75
- Height = 25
- Caption = '3'
- Enabled = False
- TabOrder = 2
- OnMouseDown = ButtonMouseDown
- OnMouseUp = ButtonMouseUp
- end
- object Button4: TButton
- Left = 4
- Top = 36
- Width = 75
- Height = 25
- Caption = '4'
- Enabled = False
- TabOrder = 3
- OnMouseDown = ButtonMouseDown
- OnMouseUp = ButtonMouseUp
- end
- object Button5: TButton
- Left = 84
- Top = 36
- Width = 75
- Height = 25
- Caption = '5'
- Enabled = False
- TabOrder = 4
- OnMouseDown = ButtonMouseDown
- OnMouseUp = ButtonMouseUp
- end
- object Button6: TButton
- Left = 162
- Top = 36
- Width = 75
- Height = 25
- Caption = '6'
- Enabled = False
- TabOrder = 5
- OnMouseDown = ButtonMouseDown
- OnMouseUp = ButtonMouseUp
- end
- object Button7: TButton
- Left = 4
- Top = 64
- Width = 75
- Height = 25
- Caption = '7'
- Enabled = False
- TabOrder = 6
- OnMouseDown = ButtonMouseDown
- OnMouseUp = ButtonMouseUp
- end
- object Button8: TButton
- Left = 84
- Top = 64
- Width = 75
- Height = 25
- Caption = '8'
- Enabled = False
- TabOrder = 7
- OnMouseDown = ButtonMouseDown
- OnMouseUp = ButtonMouseUp
- end
- object Button9: TButton
- Left = 162
- Top = 64
- Width = 75
- Height = 25
- Caption = '9'
- Enabled = False
- TabOrder = 8
- OnMouseDown = ButtonMouseDown
- OnMouseUp = ButtonMouseUp
- end
- object Button10: TButton
- Left = 4
- Top = 92
- Width = 75
- Height = 25
- Caption = '10'
- Enabled = False
- TabOrder = 9
- OnMouseDown = ButtonMouseDown
- OnMouseUp = ButtonMouseUp
- end
- object Button11: TButton
- Left = 84
- Top = 92
- Width = 75
- Height = 25
- Caption = '11'
- Enabled = False
- TabOrder = 10
- OnMouseDown = ButtonMouseDown
- OnMouseUp = ButtonMouseUp
- end
- object Button12: TButton
- Left = 162
- Top = 92
- Width = 75
- Height = 25
- Caption = '12'
- Enabled = False
- TabOrder = 11
- OnMouseDown = ButtonMouseDown
- OnMouseUp = ButtonMouseUp
- end
- end
- object PnlDisplay: TPanel
- Left = 0
- Top = 157
- Width = 241
- Height = 33
- Align = alBottom
- BevelOuter = bvLowered
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 1
- end
- object PnlControls: TPanel
- Left = 0
- Top = 0
- Width = 241
- Height = 33
- Align = alTop
- BevelOuter = bvLowered
- TabOrder = 2
- object BtnStart: TSpeedButton
- Left = 72
- Top = 4
- Width = 93
- Height = 25
- Caption = 'Start !'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- NumGlyphs = 2
- ParentFont = False
- OnClick = BtnStartClick
- end
- object LblTimer: TLabel
- Left = 8
- Top = 8
- Width = 28
- Height = 15
- Caption = 'Time'
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- end
- end
- object Timer1: TTimer
- Enabled = False
- Interval = 100
- OnTimer = Timer1Timer
- Left = 200
- Top = 8
- end
- end
-